home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / clang / fgl105c.zip / 09-15.C < prev    next >
Text File  |  1991-05-05  |  619b  |  33 lines

  1. char arrow[] = {6,1,9,2,2,9,1,19,7,2,8,1};
  2.  
  3. main()
  4. {
  5.    int old_mode;
  6.  
  7.    if (fg_testmode(4,1) == 0) {
  8.       printf("This program requires a 320 ");
  9.       printf("x 200 CGA graphics mode.\n");
  10.       exit();
  11.       }
  12.  
  13.    old_mode = fg_getmode();
  14.    fg_setmode(4);
  15.    fg_setclip(0,15,0,199);
  16.  
  17.    fg_setcolor(3);
  18.    fg_rect(0,319,0,199);
  19.  
  20.    fg_move(10,10);
  21.    fg_drawmask(arrow,12,10);
  22.    fg_move(10,20);
  23.    fg_clipmask(arrow,12,10);
  24.    fg_move(10,30);
  25.    fg_revmask(arrow,12,10);
  26.    fg_move(10,40);
  27.    fg_flipmask(arrow,12,10);
  28.    fg_waitkey();
  29.  
  30.    fg_setmode(old_mode);
  31.    fg_reset();
  32. }
  33.